object Archive: TArchive Left = 228 Top = 140 Width = 667 Height = 528 Caption = 'Archiwum' Color = clBtnFace Constraints.MinHeight = 430 Constraints.MinWidth = 500 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False Position = poScreenCenter Scaled = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object StatusBar1: TStatusBar Left = 0 Top = 455 Width = 659 Height = 19 Panels = < item Width = 400 end> SimplePanel = False end object Panel1: TPanel Left = 0 Top = 56 Width = 659 Height = 399 Align = alClient BevelOuter = bvNone TabOrder = 1 object Panel3: TPanel Left = 89 Top = 0 Width = 570 Height = 399 Align = alClient BevelOuter = bvNone TabOrder = 0 object Panel4: TPanel Left = 0 Top = 144 Width = 570 Height = 255 Align = alClient BevelOuter = bvNone BorderStyle = bsSingle Ctl3D = True ParentCtl3D = False TabOrder = 1 object Panel5: TPanel Left = 0 Top = 0 Width = 566 Height = 41 Align = alTop Color = 15724527 Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Label1: TLabel Left = 8 Top = 6 Width = 43 Height = 13 Caption = 'Label1' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False ShowAccelChar = False end object Label2: TLabel Left = 216 Top = 6 Width = 37 Height = 13 Caption = 'Label2' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False ShowAccelChar = False end object Label3: TLabel Left = 88 Top = 6 Width = 43 Height = 13 Caption = 'Label2' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False ShowAccelChar = False end object Label4: TLabel Left = 280 Top = 6 Width = 37 Height = 13 Caption = 'Label2' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False ShowAccelChar = False end object Label5: TLabel Left = 8 Top = 22 Width = 43 Height = 13 Caption = 'Label2' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False ShowAccelChar = False end object Label6: TLabel Left = 216 Top = 22 Width = 37 Height = 13 Caption = 'Label2' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False ShowAccelChar = False end end end object ListView1: TListView Left = 0 Top = 0 Width = 570 Height = 144 Align = alTop Columns = <> Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] HideSelection = False MultiSelect = True OwnerData = True ReadOnly = True RowSelect = True ParentFont = False PopupMenu = PopupMenu1 TabOrder = 0 ViewStyle = vsReport OnChange = ListView1Change OnData = ListView1Data OnKeyDown = ListView1KeyDown OnKeyPress = ListView1KeyPress OnSelectItem = ListView1SelectItem end end object Panel2: TPanel Left = 0 Top = 0 Width = 89 Height = 399 Align = alLeft BevelOuter = bvLowered Color = 15724527 Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 object SpeedButton1: TSpeedButton Left = 8 Top = 8 Width = 73 Height = 41 Cursor = crHandPoint Caption = 'Wiadomo'#347'ci' Flat = True Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] Layout = blGlyphTop ParentFont = False OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 8 Top = 60 Width = 73 Height = 49 Cursor = crHandPoint Caption = 'Rozmowy' Flat = True Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] Layout = blGlyphTop ParentFont = False OnClick = SpeedButton2Click end object SpeedButton3: TSpeedButton Left = 8 Top = 120 Width = 73 Height = 41 Cursor = crHandPoint Caption = 'SMSy' Flat = True Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] Layout = blGlyphTop ParentFont = False OnClick = SpeedButton3Click end object Bevel1: TBevel Left = 8 Top = 56 Width = 73 Height = 9 Shape = bsTopLine end object Bevel2: TBevel Left = 8 Top = 112 Width = 73 Height = 9 Shape = bsTopLine end object Bevel3: TBevel Left = 8 Top = 168 Width = 73 Height = 9 Shape = bsTopLine end end end object Panel6: TPanel Left = 0 Top = 0 Width = 659 Height = 30 Align = alTop BevelOuter = bvLowered Color = clGray TabOrder = 2 DesignSize = ( 659 30) object Label7: TLabel Left = 8 Top = 5 Width = 215 Height = 18 Caption = 'Wiadomo'#347'ci (Wszystkie)' Font.Charset = EASTEUROPE_CHARSET Font.Color = clWhite Font.Height = -16 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False ShowAccelChar = False end object Bevel4: TBevel Left = 431 Top = 3 Width = 1 Height = 23 Anchors = [akTop, akRight] Shape = bsRightLine end object ComboBox1: TComboBox Left = 441 Top = 3 Width = 209 Height = 21 Style = csDropDownList Anchors = [akTop, akRight] DropDownCount = 30 Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [fsBold] ItemHeight = 13 ParentFont = False TabOrder = 0 OnChange = ComboBox1Change end end object Panel7: TPanel Left = 0 Top = 30 Width = 659 Height = 26 Align = alTop BevelOuter = bvLowered Color = 14869218 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 3 object Label8: TLabel Left = 8 Top = 7 Width = 60 Height = 13 Caption = 'Wyszukaj:' Transparent = True end object Label9: TLabel Left = 224 Top = 7 Width = 73 Height = 13 Caption = 'Wyszukaj w:' Transparent = True end object Edit1: TEdit Left = 72 Top = 3 Width = 145 Height = 21 TabOrder = 0 OnKeyPress = Edit1KeyPress end object ComboBox2: TComboBox Left = 304 Top = 3 Width = 113 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 end object Button1: TButton Left = 424 Top = 3 Width = 65 Height = 20 Caption = 'Znajd'#378 TabOrder = 2 OnClick = SpeedButton4Click end object Button2: TButton Left = 490 Top = 3 Width = 65 Height = 20 Caption = 'Wyczy'#347#263 TabOrder = 3 OnClick = SpeedButton5Click end object Button3: TButton Left = 556 Top = 3 Width = 100 Height = 20 Caption = 'Zaawansowane' TabOrder = 4 OnClick = SpeedButton6Click end end object MainMenu1: TMainMenu Left = 104 Top = 88 object Archiwum1: TMenuItem Caption = 'Archiwum' object Kompaktujarchiwum1: TMenuItem Caption = 'Kompaktuj archiwum' OnClick = Kompaktujarchiwum1Click end object N1: TMenuItem Caption = '-' end object Koniec1: TMenuItem Caption = 'Koniec' OnClick = Koniec1Click end end object Edycja1: TMenuItem Caption = 'Edycja' object Szukaj1: TMenuItem Caption = 'Znajd'#378 ShortCut = 16454 OnClick = Szukaj1Click end object Znajdnastpny1: TMenuItem Caption = 'Znajd'#378' nast'#281'pny' ShortCut = 114 OnClick = Znajdnastpny1Click end object N3: TMenuItem Caption = '-' end object Zaznaczwszystko1: TMenuItem Caption = 'Usu'#324' zaznaczone do skasowania' ShortCut = 16452 OnClick = Zaznaczwszystko1Click end end object Widok1: TMenuItem Caption = 'Widok' object Wywietlajemotikony1: TMenuItem Caption = 'Emotikony' ShortCut = 113 OnClick = Wywietlajemotikony1Click end end end object PopupMenu1: TPopupMenu Left = 136 Top = 88 object Zaznaczdoskasowania1: TMenuItem Caption = 'Zaznacz do skasowania' ShortCut = 46 OnClick = Zaznaczdoskasowania1Click end object Usuzaznaczenie1: TMenuItem Caption = 'Usu'#324' zaznaczenie' ShortCut = 13 OnClick = Usuzaznaczenie1Click end object N2: TMenuItem Caption = '-' end object Zaznaczwszystko2: TMenuItem Caption = 'Zaznacz wszystko' ShortCut = 16449 OnClick = Zaznaczwszystko2Click end object N4: TMenuItem Caption = '-' end object Deleteselectedfordeletion1: TMenuItem Caption = 'Delete selected for deletion' ShortCut = 16452 OnClick = Deleteselectedfordeletion1Click end end end